home *** CD-ROM | disk | FTP | other *** search
/ Immoral Angel 1 / Immoral Angel 1.iso / pc / program / main.dxr / 00091_yes,up.ls < prev    next >
Encoding:
Text File  |  1997-07-11  |  304 b   |  18 lines
  1. on mouseDown
  2.   global framenum, runstatus
  3.   if button() then
  4.     if runstatus = "Saver" then
  5.       setsaver()
  6.     end if
  7.     if runstatus = "beep" then
  8.       setbeep()
  9.     end if
  10.     if runstatus = "quit" then
  11.       cursor(200)
  12.       go("quitProgram")
  13.       exit
  14.     end if
  15.     go(framenum)
  16.   end if
  17. end
  18.